object SmallCalendar: TSmallCalendar Left = 261 Top = 154 BorderIcons = [] BorderStyle = bsNone ClientHeight = 121 ClientWidth = 161 Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] PixelsPerInch = 96 OnShow = FormShow TextHeight = 16 object Panel1: TPanel Left = 0 Top = 0 Width = 161 Height = 121 BorderStyle = bsSingle TabOrder = 0 object Label1: TLabel Left = 2 Top = 2 Width = 155 Height = 16 Alignment = taCenter AutoSize = False Caption = 'Label1' Font.Color = clMaroon Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object CWBasicCalendar1: TCWBasicCalendar Left = 1 Top = 16 Width = 157 Height = 102 CellColor = clSilver Ctl3D = False DateFont.Color = clBlack DateFont.Height = -9 DateFont.Name = 'Small Fonts' DateFont.Style = [] DayTitleFormat = OneLetter DayTitles.Strings = ( 'Sunday' 'Monday' 'Tuesday' 'Wednesday' 'Thursday' 'Friday' 'Saturday') FocusMode = fm3D GridColor = clSilver GridLines = False HeaderColor = clSilver HeaderFont.Color = clMaroon HeaderFont.Height = -9 HeaderFont.Name = 'Arial' HeaderFont.Style = [] HeaderHeight = 14 HiLight3D = hlRaised HiLightColor = clSilver StartOfWeek = Sunday OnKeyDown = CWBasicCalendar1KeyDown OnMouseUp = CWBasicCalendar1MouseUp object Bevel1: TBevel Left = 2 Top = 14 Width = 152 Height = 2 Shape = bsTopLine end end object CWArrowBtn1: TCWArrowBtn Left = 8 Top = 4 Width = 24 Height = 14 Hint = 'Previous Year' ButtonType = btPrevYear Direction = dLeft RepeatTimer = True ShowHint = True OnClick = CWArrowBtn1Click end object CWArrowBtn2: TCWArrowBtn Left = 127 Top = 4 Width = 24 Height = 14 Hint = 'Next Year' ButtonType = btPrevYear Direction = dRight RepeatTimer = True ShowHint = True OnClick = CWArrowBtn2Click end object CWArrowBtn3: TCWArrowBtn Left = 33 Top = 4 Width = 14 Height = 14 Hint = 'Previous Month' ButtonType = btPrevYear Direction = dLeft RepeatTimer = True ShowHint = True OnClick = CWArrowBtn3Click end object CWArrowBtn4: TCWArrowBtn Left = 112 Top = 4 Width = 14 Height = 14 Hint = 'Next Month' ButtonType = btPrevYear Direction = dRight RepeatTimer = True ShowHint = True OnClick = CWArrowBtn4Click end end end